home *** CD-ROM | disk | FTP | other *** search
/ Suzy B Software 2 / Suzy B Software CD-ROM 2 (1994).iso / extras / programm / gemfsc19 / gemfsc19.lzh / GEMFBIND / VRBOX.S < prev    next >
Text File  |  1993-03-26  |  789b  |  37 lines
  1. ;*========================================================================
  2. ;* VDIFAST Public Domain VDI bindings.
  3. ;*========================================================================
  4.  
  5.  
  6. ;*------------------------------------------------------------------------
  7. ;* Rounded and filled rounded rectangle.
  8. ;*------------------------------------------------------------------------
  9.  
  10.           globl     _v_rbox
  11. _v_rbox:
  12. ;    .cargs    #4,handle.w,pxy.l
  13.  
  14. handle      =         4
  15. pxy       =         6
  16.  
  17.           moveq.l    #11,d0
  18.           moveq.l    #8,d1
  19.           move.w    #2,a1
  20.           move.l    pxy(sp),a0
  21.           jmp        vout_pxy
  22.  
  23.           globl     _v_rfbox
  24. _v_rfbox:
  25. ;    .cargs    #4,handle.w,pxy.l
  26.  
  27. handle      =         4
  28. pxy       =         6
  29.  
  30.           moveq.l    #11,d0
  31.           moveq.l    #9,d1
  32.           move.w    #2,a1
  33.           move.l    pxy(sp),a0
  34.           jmp        vout_pxy
  35.  
  36.           end
  37.